home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 12 / BBS in a box XII-1.iso / Files / Tele / T / Terminal 1.7.sit / Terminal scripts / Hangup DTR.s < prev    next >
Encoding:
Text File  |  1989-11-06  |  191 b   |  13 lines  |  [TEXT/QED1]
  1. /*
  2.     Terminal 1.7
  3.     "Hangup DTR.s"
  4. */
  5.  
  6. main()
  7. {
  8.     setdtr(0);    /* Negate DTR: modem hangs up */
  9.     pause(60);    /* Wait one second */
  10.     setdtr(1);    /* Assert DTR: now back in command mode */
  11.     beep();
  12. }
  13.